#ifndef ___fat32_transaccionA7_crear_directorio

#define ___fat32_transaccionA7_crear_directorio 1

#include "f32_mto.c"

#include "f32_st01.c"
#include "f32_st02.c"
#include "f32_st03.c"
#include "f32_st10.c"
#include "f32_st11.c"
#include "f32_st12.c"
#include "f32_st14.c"
#include "f32_st22.c"

enum fat32trA7_errores {
  FAT32_A7_RUTA_NO_EXISTE = 1,
  FAT32_A7_ENTRADA_YA_EXISTE = 2,
  FAT32_A7_DISCO_LLENO = 3
};

struct fat32tr_datos_entrada {
  char * directorio;
  unsigned int remitente;
};

struct fat32tr_datos_internos {
  char * directorioNuevo;
  unsigned int remitenteMensaje;
  unsigned int conexion;
  char ** ruta;
  char ** rutaPadre;
  unsigned long long descriptor;
  fat32_ref_entrada_directorio entrada;
  void * datosInternos;
  fat32_lista_bloques_para_escribir * lbpe1;
  fat32_lista_bloques_para_escribir * lbpe2;
  fat32_lista_bloques_para_escribir * lbpeF;
  unsigned long numeroBloque;
  unsigned short offsetBloque;
  char * nombreDirectorio;
  signed short errorDevuelto;
};

void fat32tr_crear_directorio(char *, unsigned int);
int fat32ctr_crear_directorio(FAT32_PARAMS_CREACION_TRANSACCION);
int fat32etr_crear_directorio(FAT32_PARAMS_TRANSACCION);

void fat32tr_crear_directorio (char * directorio, unsigned int remitente) {
  struct fat32trA7_datos_entrada datos;
  datos.remitente = remitente;
  datos.directorio = malloc(strlen(directorio) + 1);
  memcpy(datos.directorio, directorio, strlen(directorio) + 1);
  fat32_crear_transaccion(&fat32ctr_crear_directorio, &datos, sizeof datos);
}

int fat32ctr_crear_directorio (FAT32_PARAMS_CREACION_TRANSACCION) {
  struct fat32trA7_datos_entrada * de = datosIniciales;
  struct fat32trA7_datos_internos * di = malloc(sizeof(struct fat32trA7_datos_internos));
  di -> directorioNuevo = de -> directorio;
  di -> remitenteMensaje = de -> remitente;
  *datos = di;
  *handler = fat32etr_crear_directorio;
  return 0xE100;
}

int fat32etr_crear_directorio (FAT32_PARAMS_TRANSACCION) {
  unsigned char estado1;
  int estado2;
  estado2 = estado >> 8;
  estado1 = estado & 255;
  struct fat32trA7_datos_internos * datosT = *datos;
  switch (estado2) {
  case 0x01:
    estado1 = fat32st_obtener_conexion(estado1, numeroTransaccion, &(datosT -> conexion), resultadoOperacion, datosOperacion);
    if (!estado1) estado2 = 0x02;
    break;
  case 0x02:
    estado1 = fat32st_ubicar_entrada_directorio(estado1, numeroTransaccion, datosT -> rutaPadre, &(datosT -> datosInternos),
                                                                                         resultadoOperacion, datosOperacion);
    if (!estado1) {
      datosT -> entrada = *((struct fat32_ref_entrada_directorio *) (datosT -> datosInternos));
      free(datosT -> datosInternos);
      estado2 = 0xE1;
      estado1 = 1;
    }
    break;
  case 0x03:
    estado1 = fat32st_bloquear_directorio_por_escritura_entrada(estado1, numeroTransaccion, datosT -> descriptor, resultadoOperacion);
    if (!estado1) estado2 = 0x04;
    break;
  case 0x04:
    estado1 = fat32st_crear_entrada_para_archivo(estado1, numeroTransaccion, datosT -> nombreDirectorio, 0,
                                                 (datosT -> entrada).clusterInicial, &(datosT -> datosInternos), resultadoOperacion,
                                                 datosOperacion);
    if (!estado1) {
      struct fat32st14_resultado resultado = *((struct fat32st14_resultado *) (datosT -> datosInternos));
      free(datosT -> datosInternos);
      datosT -> lbpe1 = resultado.lbpe;
      datosT -> numeroBloque = resultado.numeroBloque;
      datosT -> offsetBloque = resultado.posicionBloque;
      estado2 = 0xE1;
      estado1 = 2;
    }
    break;
  case 0x05:
    estado1 = fat32st_crear_estructura_inicial_directorio(estado1, numeroTransaccion, (datosT -> entrada).clusterInicial,
                                                          datosT -> numeroBloque, datosT -> offsetBloque, &(datosT -> datosInternos),
                                                          resultadoOperacion, datosOperacion);
    if (!estado1) {
      datosT -> lbpe2 = datosT -> datosInternos;
      estado2 = 0xE1;
      estado1 = 3;
    }
    break;
  case 0x06:
    estado1 = fat32st_ejecutar_lista_bloques_para_escribir(estado1, numeroTransaccion, datosT -> lbpeF, &(datosT -> datosInternos),
                                                                                                resultadoOperacion, datosOperacion);
    if (!estado1) {
      estado2 = 0xE1;
      estado1 = 4;
    }
    break;
  case 0x07:
    estado1 = fat32st_liberar_conexion(estado1, numeroTransaccion);
    if (!estado1) {
      estado2 = 0xE1;
      estado1 = 5;
    }
    break;
  case 0xE1:
    switch (estado1) {
    case 0:
      datosT -> ruta = fat32_obtener_ruta(datosT -> directorioNuevo);
      datosT -> rutaPadre = fat32_copiar_ruta(datosT -> ruta);
      unsigned int posicionRuta;
      for (posicionRuta = 0; (datosT -> rutaPadre)[posicionRuta]; posicionRuta ++);
      posicionRuta --;
      datosT -> nombreDirectorio = (datosT -> rutaPadre)[posicionRuta];
      (datosT -> rutaPadre)[posicionRuta] = NULL;
      datosT -> descriptor = fat32_generar_descriptor(datosT -> rutaPadre, 1);
      datosT -> lbpe1 = NULL;
      datosT -> lbpe2 = NULL;
      datosT -> lbpeF = NULL;
      datosT -> errorDevuelto = -1;
      estado2 = 0x01;
      break;
    case 1:
      if ((datosT -> entrada).resultado == 2) datosT -> errorDevuelto = FAT32_A7_RUTA_NO_EXISTE;
      if (!(datosT -> entrada).resultado) datosT -> errorDevuelto = FAT32_A7_ENTRADA_YA_EXISTE;
      if ((datosT -> entrada).resultado == 1) {
        estado2 = 0x03;
        estado1 = 0;
      } else
        estado1 = 4;
      break;
    case 2:
      if (!(datosT -> lbpe1)) {
        datosT -> errorDevuelto = FAT32_A7_DISCO_LLENO;
        estado1 = 4;
      } else {
        estado2 = 0x05;
        estado1 = 0;
      }
      break;
    case 3:
      datosT -> lbpeF = malloc(sizeof(fat32_lista_bloques_para_escribir));
      fat32_combinar_listas_bloques_para_escribir(datosT -> lbpeF, datosT -> lbpe1, datosT -> lbpe2, NULL);
      estado2 = 0x06;
      estado1 = 0;
      break;
    case 4:
      if ((datosT -> errorDevuelto) == -1)
        mtf_enviar_mensaje(fat32_centro_mensajes, datosT -> remitenteMensaje, MTR_DIRECTORIO_CREADO, datosT -> directorioNuevo);
      else
        mtf_enviar_mensaje(fat32_centro_mensajes, datosT -> remitenteMensaje, MTR_DIRECTORIO_NO_CREO, datosT -> directorioNuevo,
                                                                                                  (int) datosT -> errorDevuelto);
      estado2 = 0x07;
      estado1 = 0;
      break;
    case 5:
      fat32_destruir_ruta(datosT -> ruta);
      fat32_destruir_ruta(datosT -> rutaPadre);
      free(datosT -> nombreDirectorio);
      free(datosT -> directorioNuevo);
      if (datosT -> lbpe1) free(datosT -> lbpe1);
      if (datosT -> lbpe2) free(datosT -> lbpe2);
      if (datosT -> lbpeF) free(datosT -> lbpeF);
      free(datosT);
      estado1 = 0;
      estado2 = 0;
    }
    break;
  }
  return (estado2 << 8) | estado1;
}

#endif